home *** CD-ROM | disk | FTP | other *** search
/ PC Answers 1995 December / PC Answers December 1995 (disc errors).iso / mxc / intro.dir / 00007_F4.ls < prev    next >
Encoding:
Text File  |  1995-05-04  |  920 b   |  36 lines
  1. on exitFrame
  2.   global myLine, auto, fullMoov, ok, csn, profileVid, gFirstTimeIn, gVolume
  3.   puppetSprite(24, 1)
  4.   setVid()
  5.   if ok <> auto then
  6.     set ok to auto
  7.     blankBut()
  8.   end if
  9.   if (gFirstTimeIn = 1) and (myLine = 1) then
  10.     set the volume of sprite 24 to gVolume
  11.     set the movieRate of sprite 24 to 1
  12.     set gFirstTimeIn to 0
  13.   end if
  14.   if the movieRate of sprite 24 = 0 then
  15.     set the castNum of sprite 3 to 31
  16.     set the castNum of sprite 5 to 23
  17.     check()
  18.   end if
  19.   if the movieRate of sprite 24 = 1 then
  20.     set the castNum of sprite 5 to 36
  21.     set the castNum of sprite 3 to 21
  22.   end if
  23.   if profileVid = 1 then
  24.     set the castNum of sprite 4 to 30
  25.     set the castNum of sprite 6 to 40
  26.     set the castNum of sprite 7 to 50
  27.   end if
  28.   if myLine = csn then
  29.     set the castNum of sprite 6 to 40
  30.   end if
  31.   if myLine = 1 then
  32.     set the castNum of sprite 4 to 30
  33.   end if
  34.   go(the frame)
  35. end
  36.